home *** CD-ROM | disk | FTP | other *** search
/ 1st Multimedia Mac Shareware / Multimedia Shareware CD-ROM - BetaCorp.iso / Referenceƒ / MPG / stack_-1.xml < prev   
Encoding:
Extensible Markup Language  |  1992-08-09  |  1.4 KB  |  24 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
  3. <stack>
  4.     <name>in</name>
  5.     <id>-1</id>
  6.     <cardCount>4</cardCount>
  7.     <cardID>2955</cardID>
  8.     <listID>2542</listID>
  9.     <cantModify><false /></cantModify>
  10.     <cantDelete><false /></cantDelete>
  11.     <cantAbort><false /></cantAbort>
  12.     <cardSize>
  13.         <width>512</width>
  14.         <height>342</height>
  15.     </cardSize>
  16.     <script>on openStack
  17. global doCalc,trap
  18. put true into doCalc
  19. put false into trap
  20. end openStack
  21.  
  22. on doMenu thing
  23. global passFlag,trap
  24. if trap then
  25. beep
  26. exit doMenu
  27. end if
  28. if thing="New Card" and passFlag<>1 then
  29. beep 2
  30. answer "Use the button on the last data card." with "OK"
  31. exit doMenu
  32. end if
  33. if thing="Delete Card" or thing="Cut Card" then
  34. put the number of cards into lastCard
  35. put the number of this card into thisCard
  36. if thisCard=1 or thisCard=lastCard then
  37. beep 2
  38. answer "Do not delete the First or Last Card!" with "OK, sorry."
  39. exit doMenu
  40. end if
  41. end if
  42. pass doMenu
  43. end doMenu
  44. </script>
  45.     <background id="2599" file="background_2599.xml" name="" />
  46.     <background id="3638" file="background_3638.xml" name="" />
  47.     <card id="2955" file="card_2955.xml" marked="false" name="" owner="2599" />
  48.     <card id="3166" file="card_3166.xml" marked="false" name="" owner="2599" />
  49.     <card id="4616" file="card_4616.xml" marked="false" name="" owner="2599" />
  50.     <card id="4083" file="card_4083.xml" marked="false" name="" owner="3638" />
  51. </stack>
  52.